{$CLEO .cs}
0000:

   model.Load(#HUNTLEY) 
   model.Load(#SWMYHP1)
   load_requested_models
   :loop
   const
      dont_stop = 16@
      speeding = 17@
   end 
   dont_stop = 5 
   speeding = 15.0 
   repeat
   wait 0
   until 00FE:   actor $PLAYER_ACTOR sphere 0 in_sphere -1131.7941 -7267.2529 7.81 radius 200.0 200.0 150.0

   :1
   wait 0
        if and 
        model.Available(#SWMYHP1)
        model.Available(#HUNTLEY) 
   jf @1
   20@ = audiostream.Load3D("cleo\@Railcity\sound_003.wav")
   audiostream.Loop(20@,1)
   0@ = car.Create( #HUNTLEY , -1039.7358, -7219.8198, 7.8359)
   car.Angle( 0@ ) = 92.4611
   car.Health(0@) = 20000
   car.DoorStatus( 0@,4)
   09C4: set_car 0@ gas_tank_explosion_enabled 0

   1@ = actor.CreateAsDriver( 4 , #SWMYHP1 , 0@)
   0982: set_actor 1@ stay_in_car_when_dead 1
   0526: set_actor 1@ stay_in_car_when_jacked  1

   0615: define_AS_pack_begin 15@
   05D1: AS_actor -1 drive_car -1 to -1066.8118 -7220.7959 9.0063 speed speeding 2 model #NULL dont_stop
   05D1: AS_actor -1 drive_car -1 to -1342.3741 -7222.3716 8.3678 speed speeding 2 model #NULL dont_stop
   05D1: AS_actor -1 drive_car -1 to -1349.6493 -7380.5024 7.9946 speed speeding 2 model #NULL dont_stop
   05D1: AS_actor -1 drive_car -1 to -934.9883 -7380.3008 8.5503 speed speeding 2 model #NULL dont_stop
   05D1: AS_actor -1 drive_car -1 to -826.4334 -7318.2349 8.6877 speed speeding 2 model #NULL dont_stop
   05D1: AS_actor -1 drive_car -1 to -878.3928 -7223.5181 8.6739 speed speeding 2 model #NULL dont_stop
   05D1: AS_actor -1 drive_car -1 to -928.4025 -7221.6079 9.4259 speed speeding 2 model #NULL dont_stop
 

   0643: set_AS_pack 15@ loop 1 
   0618: assign_actor 1@ to_AS_pack 15@
   061B: remove_references_to_AS_pack 15@
        model.destroy(#SWMYHP1)
        model.destroy(#HUNTLEY)


   repeat
   wait 0 
        if car_defined 0@
        then
           18@ = car.Health( 0@)
           if 18@ <= 15000
           then
               05BE: AS_actor 1@ die
               audiostream.LinkToCar(20@,0@)
               audiostream.PerformAction(20@,RESUME)
               car.SetMaxSpeed(0@,0.0)
           end 
        end
   until  80FE:  not  actor $PLAYER_ACTOR sphere 0 in_sphere -1131.7941 -7267.2529 7.81 radius 200.0 200.0 150.0
   
   car.RemoveReferences(0@)
   actor.RemoveReferences(1@)
   audiostream.Release( 20@ )
   jump @loop